home *** CD-ROM | disk | FTP | other *** search
/ Student Private Syndrome 3 / Student Private Syndrome 3.iso / private / photo / photo.dxr / 00003.ls < prev    next >
Encoding:
Text File  |  1996-06-21  |  483 b   |  20 lines

  1. on exitFrame
  2.   global startticks, photono, photomode
  3.   puppetSprite(2, 1)
  4.   if photomode = "Auto" then
  5.     set sp to 10
  6.   else
  7.     set sp to 11
  8.   end if
  9.   puppetSprite(sp, 1)
  10.   set the castNum of sprite sp to the number of cast (photomode & ",ON")
  11.   if the castNum of sprite 1 = the castNum of sprite 2 then
  12.     changephoto(photono)
  13.     updateStage()
  14.   end if
  15.   unLoadCast(getphotono(photono - 2))
  16.   preLoadCast(getphotono(photono + 1))
  17.   set startticks to the ticks
  18.   cursor(0)
  19. end
  20.